menu query,channel,menubar {
  -
   ==( mr  2 )==
  .==( Pwr )==:/me 12(12@ Power14) $power2 12
  .==( ֊ )==:/me 12(12OS14) $dll($mircdir\moo.dll,osinfo,_) 12
  .==( UTm )==:/me 12(12UpTime14) $dll($mircdir\moo.dll,uptime,_) / $OStime 12
  .==( Hrddrv )==:/me 12(12Free Space Available14) $frespc 12
  .==( ly )==:/me 12(12Display Adapters14) $Shwvga $dll($mircdir\moo.dll,screeninfo,_) 12
  .==( Rm I )==:/me 12(12Total Free Ram Speed14) $fram 12
  .==( t )==:/me 12(12Connection Type14) $dll($mircdir\moo.dll,connection,_) 12
  .==( Pr뚚r )==:/me 12(12CPU Vendor14) $getInfo(getCPUVendor) x86 processor(s) 12
  .==( wrk dކr )==:/me 12(12Network Adapter14) $dll($mircdir\moo.dll,interfaceinfo,_) 12
  .-
  .==( Fll tt )==:nfo
}
alias nfo {
  /me 12 SystemInformation 
  /me 12(12OS14) $dll($mircdir\moo.dll,osinfo,_) 12
  /me 12(12UpTime14) $dll($mircdir\moo.dll,uptime,_) / $OStime 12
  /me 12(12CPU Type14) $dll($mircdir\moo.dll,cpuinfo,_) 12
  /me 12(12Free CPU Speed14) $CPUspd 12
  /me 12(12CPU Vendor14) $getInfo(getCPUVendor) x86 processor(s) 12
  /me 12(12Display Adapters14) $Shwvga $dll($mircdir\moo.dll,screeninfo,_) 12
  /me 12(12Total Free Ram Speed14) $fram 12
  /me 12(12Free Space Available14) $frespc 12
  /me 12(12Connection Type14) $dll($mircdir\moo.dll,connection,_) 12
  /me 12(12Network Adapter14) $dll($mircdir\moo.dll,interfaceinfo,_) 12
  /me 12(12@ Power14) $power2 12
  /me 12 SystemInformation 
}
Alias CPUspd { Var %protest = $ticks , %i = 1 | :start | If ($calc($ticks - %protest) <= 100) { .inc %i | .goto Start } | :end | .return $round($calc(%i * 0.7543242),2) $+ Mhz }
Alias Frespc {
  Var %hC = $round($calc(($disk(c).free)/1048576), 2), %hD = $round($calc(($disk(d).free)/1048576), 2), %hE = $round($calc(($disk(e).free)/1048576), 2), %hF = $round($calc(($disk(f).free)/1048576), 2), %hG = $round($calc(($disk(g).free)/1048576), 2), %hH = $round($calc(($disk(h).free)/1048576), 2), %h3 = $calc(%hF + %hG), %h5 = $calc(%h3 + %hH), %h5 = $calc(%h5 + %hE), %h1 = $calc(%hC + %hD), %hd = $calc(%h1 + %h5)
  .return C:\ $round($calc(($disk(c).free)/1048576), 2) $+ MB D:\ $round($calc(($disk(d).free)/1048576), 2) $+ MB E:\ $round($calc(($disk(e).free)/1048576), 2) $+ MB F:\ $round($calc(($disk(f).free)/1048576), 2) $+ MB G:\ $round($calc(($disk(g).free)/1048576), 2) $+ MB H:\ $round($calc(($disk(h).free)/1048576), 2) $+ MB Total: %hd $+ MB 
}
Alias OStime { .return $int($calc($calc( $ticks /1000)/3600)) Hours, $calc($int($calc($calc( $ticks /1000)/60))-($calc($int($calc($calc( $ticks /1000)/3600))*60))) Minutes And $calc($calc( $ticks /1000)-($calc($calc($int($calc($calc( $ticks /1000)/60))*60)))) Secs }
alias ram { .return $int($calc($getInfo(getPhysicalRAMTotal)/1024/1024+1)) $+ Mb RAM }
alias fram { .return $int($calc($getInfo(getPhysicalRAMTotal)/1024/1024+1)) $+ Mb Ram $& ( $+ $int($calc($getInfo(getPhysicalRAMAvailable)/1024/1024+1)) $& $+ MB available, or $& $calc(100 - $getInfo(getPhysicalRAMLoad)) $+ % $+ ) RAM } 
alias getInfo { .return $dll($mircdir\winstats.dll, getInfo, $1) } 
Alias Shwvga { .return $readini C:\windows\system.ini Boot.description Display.drv With A $window(-1).w $+ X $+ $window(-1).h Resolution }
alias power2 {
  var %a = 1 , %b = 0 , %c = 0 , %d = 0
  while (%a <= $chan(0)) {
    if ($me isop $chan(%a)) {
      inc %b
      inc %c $nick($chan(%a),0,a,o)
      inc %d $calc($nick($chan(%a),0) - 1)
    }
    inc %a
  }
  return opped in %b $+ / $+ $chan(0) $chr(40) $+ $iif((%b == 0) || ($chan(0) == 0),0,$round($calc((%b / $chan(0)) * 100),2)) $+ $chr(37) $+ $chr(41) channels, power over %c $+ / $+ %d $chr(40) $+ $iif((%c == 0) && (%d == 0),0,$round($calc((%c / %d) * 100),2)) $+ $chr(37) $+ $chr(41) users..
}
